home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / Moss / Kartell.dir / 00037_Script_Jiggle with Property < prev    next >
Text File  |  1999-04-15  |  290b  |  13 lines
  1. -- Jiggle with Property
  2.  
  3. property pOriginalLoc
  4.  
  5. on beginSprite me
  6.   set pOriginalLoc = the loc of sprite the currentSpriteNum
  7. end
  8.  
  9. on prepareFrame me
  10.   set x = pOriginalLoc
  11.   set x = x + point(random(10) - 5, random(10) - 5)
  12.   set the loc of sprite the currentSpriteNum to x
  13. end